Module M_800
    Public CUST_CODE, SUPP_CODE, TRANS_DATE, CUST_VAT, SUPP_VAT, SBI_NUMBER, SBI_DATE, SBI_PAYDUEDATE, CURRENCY_CODE, TYPE_SUPP, COUNTRY_CD_CUST As String
    Public Disc, DISC_AMOUNT, TOTAL_VAT, TOTAL_SBI_VAL As Double
    Public TRANS_OLD, TRANS_NEW As Single
    Public line, X, comerc_nr, modo_paga As String
    Public sinal1, sinal2, sinal3, sinal1_2, sinal2_2, sinal1_3, sinal1_4, sinal1_5, sinal1_6, ID_entrega, Account_Dep_Nr, Contacto_cliente, cod_uni_p As String
    Public i, x814 As Integer
    Public dir_all, supplier As String
End Module
